home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Mac Mania 1
/
MacMania 1.toast
/
Educational
/
Sciences
/
Chemist's Helper
/
card_3249.txt
< prev
next >
Wrap
Text File
|
1989-10-27
|
7KB
|
380 lines
-- card: 3249 from stack: in
-- bmap block id: 3594
-- flags: 0000
-- background id: 2590
-- name:
----- HyperTalk script -----
on opencard
show card field "note"
end opencard
on calculate
global amount1
global amount2
global molar
global conc
global volume
global grav
put molar*volume/conc into amount1
put amount1 * grav into amount2
set the numberformat to "0.0"
end calculate
-- part 1 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=14 top=138 right=162 bottom=79
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: HNO3
----- HyperTalk script -----
on mouseUp
global acid
global dim
global top
global conc
global grav
put 1 into dim
put 7 into top
put 15.8 into conc
put 1.42 into grav
dimmer
put "Nitric Acid" into acid
set the highlight of button 1 to true
end mouseUp
-- part 2 (field)
-- low flags: 01
-- high flags: 0004
-- rect: left=378 top=63 right=322 bottom=500
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 12
-- style flags: 256
-- line height: 16
-- part name: acid
-- part 3 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=14 top=163 right=187 bottom=79
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: H2SO4
----- HyperTalk script -----
on mouseUp
global acid
global dim
global top
global conc
global grav
put 1 into dim
put 7 into top
put 18.0 into conc
put 1.84 into grav
dimmer
put "Sulfuric Acid" into acid
set the highlight of button 2 TO TRUE
end mouseUp
-- part 4 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=14 top=187 right=211 bottom=79
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: H3PO4
----- HyperTalk script -----
on mouseUp
global acid
global conc
global dim
global top
global grav
put 1 into dim
put 7 into top
put 14.8 into conc
put 1.70 into grav
dimmer
put "Phosphoric Acid" into acid
set the highlight of button 3 to true
end mouseUp
-- part 5 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=14 top=212 right=236 bottom=79
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Acetic
----- HyperTalk script -----
on mouseUp
global acid
global dim
global top
global conc
global grav
put 1 into dim
put 7 into top
put 17.4 into conc
put 1.05 into grav
dimmer
put "Acetic Acid" into acid
SET THE HIGHLIGHT OF BUTTON 4 TO TRUE
end mouseUp
-- part 6 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=14 top=236 right=260 bottom=79
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: NH4OH
----- HyperTalk script -----
on mouseUp
global acid
global dim
global top
global conc
global grav
put 1 into dim
put 7 into top
put 14.8 into conc
put 0.90 into grav
dimmer
put "Ammonium Hydroxide" into acid
set the highlight of button 5 to true
end mouseUp
-- part 7 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=14 top=114 right=138 bottom=79
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: HCl
----- HyperTalk script -----
on mouseUp
global acid
global dim
global top
global conc
global grav
put 1 into dim
put 7 into top
put 12.0 into conc
put 1.19 into grav
dimmer
put "Hydrochloric Acid" into acid
set the highlight of button 6 to true
end mouseUp
-- part 35 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=97 top=281 right=323 bottom=267
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Calculate
----- HyperTalk script -----
on mouseUp
global conc
global acid
global molar
global volume
global amount1
global amount2
calculate
put empty into card field "acid"
hide card field "note"
put volume & " ml" into line 2 of card field "acid"
put "of" into line 3 of card field "acid"
put molar & " M" into line 4 of card field "acid"
put acid into line 5 of card field "acid"
put "USE" into line 6 of card field "acid"
put amount1 & " ml" into line 7 of card field "acid"
put "or" into line 8 of card field "acid"
put amount2 & " gms" into line 9 of card field "acid"
put "of" into line 10 of card field "acid"
put conc & " M" into line 11 of card field "acid"
put acid into line 12 of card field "acid"
end mouseUp
-- part 36 (field)
-- low flags: 01
-- high flags: 0001
-- rect: left=368 top=31 right=326 bottom=509
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 20
-- style flags: 256
-- line height: 26
-- part name: note
-- part 37 (button)
-- low flags: 00
-- high flags: 8000
-- rect: left=304 top=292 right=342 bottom=353
-- title width / last selected line: 0
-- icon id / first selected line: 1011 / 1011
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: home
----- HyperTalk script -----
on mouseUp
go home
end mouseUp
-- part 38 (button)
-- low flags: 00
-- high flags: 8002
-- rect: left=464 top=325 right=342 bottom=512
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: info
----- HyperTalk script -----
on mouseUp
push card
go to card "info"
end mouseUp
-- part 40 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=14 top=262 right=287 bottom=80
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: OTHER
----- HyperTalk script -----
on mouseUp
GLOBAL DIM
GLOBAL TOP
global molar
global volume
global acid
show card field "note"
put empty into molar
put empty into acid
put empty into volume
PUT 1 INTO DIM
PUT 26 INTO TOP
GO TO NEXT CARD
DIMMER2
end mouseUp
-- part contents for card part 36
----- text -----
Use Caution
when
Making
Acid
or
Base
Solutions
-- part contents for card part 2
----- text -----
500 ml
of
6.0 M
Acetic Acid
USE
172.4 ml
or
181.0 gms
of
17.4 M
Acetic Acid